home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Advisor / CD-ROM Advisor.iso / blender / blen40m / opening.dir / 00225.ls < prev    next >
Encoding:
Text File  |  1995-09-28  |  750 b   |  35 lines
  1. on exitFrame
  2.   global n
  3.   if rollOver(31) then
  4.     set the visible of sprite 17 to 1
  5.   else
  6.     set the visible of sprite 17 to 0
  7.   end if
  8.   if rollOver(14) then
  9.     set the visible of sprite 19 to 1
  10.   else
  11.     set the visible of sprite 19 to 0
  12.   end if
  13.   if rollOver(44) or rollOver(45) then
  14.     set the visible of sprite 18 to 1
  15.   else
  16.     set the visible of sprite 18 to 0
  17.   end if
  18.   if rollOver(15) then
  19.     set the visible of sprite 16 to 1
  20.   else
  21.     set the visible of sprite 16 to 0
  22.   end if
  23.   repeat with n = 29 down to 22
  24.     if rollOver(n) then
  25.       puppetSprite(n, 1)
  26.       set the ink of sprite n to 4
  27.       next repeat
  28.     end if
  29.     set the ink of sprite n to 8
  30.     puppetSprite(n, 0)
  31.   end repeat
  32.   go(the frame)
  33.   updateStage()
  34. end
  35.